\begin{tabbing}
(\=(Unfold `p{-}fun{-}exp` ( 0)$\cdot$) \+
\\[0ex]CollapseTHEN ((RecUnfold `primrec` 0) 
\\[0ex]CollapseTHEN (((
\-\\[0ex](\=if (0) =0 then SplitOnConclITE else SplitOnHypITE (0))$\cdot$) \+
\\[0ex]CollapseTHENA (Auto$\cdot$)$\cdot$) 
\\[0ex]
\\[0ex]CollapseTHEN (((Try (Trivial))$\cdot$) 
\\[0ex]CollapseTHEN ((Reduce 0) 
\\[0ex]CollapseTHEN (
\-\\[0ex]F\=old `p{-}fun{-}exp` 0)$\cdot$)$\cdot$)$\cdot$)$\cdot$)$\cdot$) \+
\\[0ex]CollapseTHEN ((((if (first\_bool F:b
\-\\[0ex])\= then HypSubst' else RevHypSubst') ( {-}2)( 0))$\cdot$) \+
\\[0ex]CollapseTHENA (Auto$\cdot$)$\cdot$)$\cdot$
\-
\end{tabbing}